home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 77.7z / BS1 part 77 / Global Effect v10.271 (1992-04-15)(Millennium)(M4)(Disk 1 of 3)[cr SR][a2].7z / Global Effect v10.271 (1992-04-15)(Millennium)(M4)(Disk 1 of 3)[cr SR][a2].adf / Run_Game < prev    next >
Encoding:
Text File  |  1992-04-08  |  960 b   |  50 lines
  1. ;    Global Effect
  2. ;    -------------
  3. ;
  4. ;    IconX Workbench run script.
  5. ;    1.3/2.04/2.1 compatible, using 1.3.2 System Files.
  6. ;
  7. ;    Gamma-Release version 22-Mar 92 for 10.74
  8. ;
  9. ;    (C) Copyright Toby W.Simpson, Millennium Interactive Ltd., 1992
  10. ;    ALL RIGHTS RESERVED
  11. ;
  12. failat 30
  13. stack 7000
  14.  
  15. status >env:process command=copper
  16. break <env:process >nil: ?
  17. delete env:process            ; Ensure no copper process.
  18.  
  19. cd global_disk1:
  20.  
  21. echo "Global Effect Loading .... " NOLINE
  22.  
  23. path global_disk1:c add
  24.  
  25. dir >nil: ram:
  26.  
  27. if not exists ram:env
  28.      makedir >nil: ram:env
  29.      endif
  30.  
  31. if not exists ram:t
  32.      makedir >nil: ram:t
  33.      endif
  34.  
  35. run >nil: <nil: global_disk1:c/copper
  36.  
  37. assign env: ram:env
  38. assign t: ram:t
  39.  
  40. global_disk1:c/startup            ; Build script and get language/VM
  41.  
  42. execute env:runcommand
  43. delete env:runcommand
  44.  
  45. status >env:process command=copper
  46. break <env:process >nil: ?
  47. delete env:process            ; Remove the copper list stabiliser.
  48.  
  49. echo "Game complete - Returning to Workbench."
  50.